myvar_0 = GetPrimitiveParameter(0)
myvar_1 = GetSimulatorGlobal(SimulatorGlobal["Current House"])
myvar_2 = Inventory["new"](Inventory["kTypeLot"], myvar_1)
myvar_3 = myvar_2["getSingularTokensByCategory"](myvar_2, gTokenCategories["VacationPartyInfo"])
for loopvar1, loopvar2 in myvar_3 do 
	if (myvar_0 == -1) then
	loopvar2["setFlag"](loopvar2, InventoryToken["kFlagMarkedForDeletion"])
else
	myvar_9 = loopvar2["getProperty"](loopvar2, gVacationParty["tokenInfo"]["VacationPartyID"])
		if (myvar_9 == myvar_0) then
		
myvar_9 = loopvar2["setFlag"]
		myvar_9(loopvar2, InventoryToken["kFlagMarkedForDeletion"])
	else
	end
	end
end
myvar_2["removeTokensMarkedForDeletion"](myvar_2)
local myvar_6 = True
SetScriptReturnValue(myvar_6)
